home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / C-Cl / ClassAdministrator1.3.cpt / Classroom Administrator / card_11054.txt < prev    next >
Text File  |  1988-04-18  |  3KB  |  173 lines
  1. -- card: 11054 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 8817
  5. -- name: ProfileTemplate
  6. ----- HyperTalk script -----
  7. on OpenCard
  8.   global report, teacher
  9.   Hide card field "A"
  10.   Hide card field "B"
  11.   Hide card field "C"
  12.   Hide card field "D"
  13.   enableMenu teacher, 0, false
  14.   enableMenu report, 0, true
  15.   enableMenu report, 6, false
  16.   enableMenu report, 2, false
  17. end OpenCard
  18.  
  19. on CloseCard
  20.   global report, teacher
  21.   enablemenu teacher, 0, true
  22.   repeat with x = 1 to 6
  23.     enablemenu report, x, true
  24.   end repeat
  25. end CloseCard
  26.  
  27.  
  28.  
  29.  
  30.  
  31. -- part 3 (field)
  32. -- low flags: 81
  33. -- high flags: 0001
  34. -- rect: left=24 top=47 right=100 bottom=78
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 0 / 0
  37. -- text alignment: 0
  38. -- font id: 3
  39. -- text size: 12
  40. -- style flags: 0
  41. -- line height: 16
  42. -- part name: A
  43.  
  44.  
  45. -- part 4 (field)
  46. -- low flags: 81
  47. -- high flags: 0001
  48. -- rect: left=80 top=47 right=100 bottom=134
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 0
  52. -- font id: 3
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: B
  57.  
  58.  
  59. -- part 5 (field)
  60. -- low flags: 81
  61. -- high flags: 0001
  62. -- rect: left=303 top=48 right=101 bottom=357
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 0 / 0
  65. -- text alignment: 0
  66. -- font id: 3
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: C
  71.  
  72.  
  73. -- part 6 (field)
  74. -- low flags: 81
  75. -- high flags: 0001
  76. -- rect: left=434 top=48 right=101 bottom=488
  77. -- title width / last selected line: 0
  78. -- icon id / first selected line: 0 / 0
  79. -- text alignment: 0
  80. -- font id: 3
  81. -- text size: 12
  82. -- style flags: 0
  83. -- line height: 16
  84. -- part name: D
  85.  
  86.  
  87. -- part 8 (button)
  88. -- low flags: 00
  89. -- high flags: 0000
  90. -- rect: left=0 top=0 right=21 bottom=24
  91. -- title width / last selected line: 0
  92. -- icon id / first selected line: 26635 / 26635
  93. -- text alignment: 1
  94. -- font id: 0
  95. -- text size: 12
  96. -- style flags: 0
  97. -- line height: 16
  98. -- part name: 
  99. ----- HyperTalk script -----
  100. on mouseUp
  101.   push this card
  102.   go to ClassAdminHelp
  103. end mouseUp
  104.  
  105.  
  106.  
  107. -- part 9 (button)
  108. -- low flags: 00
  109. -- high flags: 8000
  110. -- rect: left=368 top=54 right=100 bottom=434
  111. -- title width / last selected line: 0
  112. -- icon id / first selected line: 15972 / 15972
  113. -- text alignment: 1
  114. -- font id: 0
  115. -- text size: 12
  116. -- style flags: 0
  117. -- line height: 16
  118. -- part name: Attendance
  119. ----- HyperTalk script -----
  120. on mouseUp
  121.   put char 1 of word 1 of field "Name" into temp
  122.   put temp & word 2 of field "Name" & "Attendance" into cardname
  123.   go to card cardname
  124. end mouseUp
  125.  
  126.  
  127.  
  128.  
  129.  
  130.  
  131.  
  132. -- part 10 (button)
  133. -- low flags: 00
  134. -- high flags: A001
  135. -- rect: left=377 top=106 right=156 bottom=421
  136. -- title width / last selected line: 0
  137. -- icon id / first selected line: 8538 / 8538
  138. -- text alignment: 1
  139. -- font id: 0
  140. -- text size: 12
  141. -- style flags: 0
  142. -- line height: 16
  143. -- part name: Grades
  144. ----- HyperTalk script -----
  145. on mouseUp
  146.   put char 1 of word 1 of field "Name" into temp
  147.   put temp & word 2 of field "Name" & "Grades" into cardname
  148.   visual effect iris open
  149.   go to card cardname
  150. end mouseUp
  151.  
  152.  
  153.  
  154.  
  155.  
  156. -- part 11 (button)
  157. -- low flags: 00
  158. -- high flags: 0000
  159. -- rect: left=383 top=162 right=194 bottom=423
  160. -- title width / last selected line: 0
  161. -- icon id / first selected line: 1017 / 1017
  162. -- text alignment: 1
  163. -- font id: 0
  164. -- text size: 12
  165. -- style flags: 0
  166. -- line height: 16
  167. -- part name: Dial
  168. ----- HyperTalk script -----
  169. on mouseUp
  170.   Dial line 1 of field "Phone Number" with modem
  171. end mouseUp
  172.  
  173.